module common

  implicit none
  
  character(30),parameter :: mymsg="Hello, world!"

end module common

